home *** CD-ROM | disk | FTP | other *** search
/ Interactive Bible for Kids - The Life of Paul / Paul.iso / mac / MASTRCST.DIR / 00012_Script_quit rollover < prev    next >
Text File  |  1996-09-12  |  1KB  |  72 lines

  1. on exitFrame
  2.   put 0 into x
  3.   put 0 into y
  4.   repeat while rollover (40)
  5.     if x = 0 then
  6.       startTimer
  7.     end if
  8.     if the timer < 14 then
  9.       set the memberNum of sprite 40 to 53
  10.       updatestage
  11.     end if
  12.     if the timer > 14 then
  13.       if the timer < 28 then
  14.         set the memberNum of sprite 40 to 54
  15.         updatestage
  16.       end if
  17.     end if
  18.     if the timer > 28 then
  19.       if the timer < 42 then
  20.         set the memberNum of sprite 40 to 55
  21.         updatestage
  22.       end if
  23.     end if
  24.     if the timer > 42 then
  25.       startTimer
  26.     end if
  27.     put 1 into x
  28.     
  29.     if the mouseDown then
  30.       go "no"
  31.       exit repeat
  32.     end if
  33.     
  34.   end repeat
  35.   
  36.   repeat while rollover (39)
  37.     if y = 0 then
  38.       startTimer
  39.     end if
  40.     if the timer < 15 then
  41.       set the memberNum of sprite 39 to 57
  42.       updatestage
  43.     end if
  44.     if the timer > 15 then
  45.       if the timer < 30 then
  46.         set the memberNum of sprite 39 to 58
  47.         updatestage
  48.       end if
  49.     end if
  50.     if the timer > 30 then
  51.       if the timer < 90 then
  52.         set the memberNum of sprite 39 to 59
  53.         updatestage
  54.       end if
  55.     end if
  56.     if the timer > 90 then
  57.       startTimer
  58.     end if
  59.     put 1 into y
  60.     
  61.     if the mouseDown then
  62.       go "yes"
  63.       exit repeat
  64.     end if
  65.     
  66.   end repeat
  67.   
  68.   
  69.   
  70.   
  71.   go the frame
  72. end